Word.SetFontName(objWord,sName)
Set the font of the currently selected texts in an opened Word document